inherited fmControlLesson: TfmControlLesson
  Left = 240
  Top = 119
  Width = 1450
  Height = 760
  Caption = #1054#1087#1083#1072#1090#1072' '#1076#1086#1087'. '#1091#1089#1083#1091#1075
  Constraints.MinHeight = 647
  Constraints.MinWidth = 1098
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  inherited sbBottom: TStatusBar
    Top = 695
    Width = 1434
  end
  inherited Panel1: TPanel
    Width = 1434
    Visible = False
    inherited BitBtn1: TBitBtn
      Left = 1266
      ModalResult = 0
      Kind = bkCustom
    end
    inherited BitBtn2: TBitBtn
      Left = 1354
      ModalResult = 0
      Kind = bkCustom
    end
  end
  object pcControlLesson: TcxPageControl [2]
    Left = 0
    Top = 45
    Width = 1434
    Height = 650
    ActivePage = tsTeachers
    Align = alClient
    LookAndFeel.Kind = lfOffice11
    LookAndFeel.SkinName = 'Office2007Silver'
    TabOrder = 2
    OnPageChanging = pcControlLessonPageChanging
    ClientRectBottom = 644
    ClientRectLeft = 3
    ClientRectRight = 1428
    ClientRectTop = 26
    object tsLessons: TcxTabSheet
      Caption = #1047#1072#1085#1103#1090#1080#1103
      ImageIndex = 1
      object Panel4: TPanel
        Left = 0
        Top = 0
        Width = 1425
        Height = 618
        Align = alClient
        Caption = 'Panel4'
        TabOrder = 0
        object gdLesson: TcxGrid
          Left = 1
          Top = 111
          Width = 1423
          Height = 248
          Align = alClient
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          LookAndFeel.Kind = lfOffice11
          LookAndFeel.SkinName = 'Office2007Silver'
          object tvLesson: TcxGridDBTableView
            NavigatorButtons.ConfirmDelete = False
            NavigatorButtons.PriorPage.Visible = True
            NavigatorButtons.Next.Visible = True
            NavigatorButtons.Insert.Visible = True
            NavigatorButtons.Append.Visible = False
            NavigatorButtons.Edit.Visible = False
            NavigatorButtons.Post.Visible = True
            NavigatorButtons.Cancel.Visible = False
            NavigatorButtons.Refresh.Visible = False
            NavigatorButtons.SaveBookmark.Visible = False
            NavigatorButtons.GotoBookmark.Visible = False
            NavigatorButtons.Filter.Visible = False
            OnEditing = tvLessonEditing
            DataController.DataSource = dsLesson
            DataController.Summary.DefaultGroupSummaryItems = <>
            DataController.Summary.FooterSummaryItems = <
              item
                Format = #1050#1086#1083'-'#1074#1086':,0'
                Kind = skCount
                FieldName = 'PP'
                Column = tvLessonPP
              end
              item
                Format = '#,###0'
                Kind = skSum
                FieldName = 'RSOPLATIT'
                Column = tvLessonRSOPLATIT
              end
              item
                Kind = skMin
                Column = tvLessonRSOPLATIT
              end
              item
                Kind = skMax
                Column = tvLesson_IS_NOT_TO_PAY_WITHOUT_CONFLICT
              end
              item
                Kind = skMax
                Column = tvLesson_IS_WITH_TO_PAY_WITHOUT_PAYMENT
              end>
            DataController.Summary.SummaryGroups = <>
            OptionsBehavior.CellHints = True
            OptionsBehavior.IncSearch = True
            OptionsBehavior.ExpandMasterRowOnDblClick = False
            OptionsCustomize.ColumnFiltering = False
            OptionsData.CancelOnExit = False
            OptionsData.Deleting = False
            OptionsData.DeletingConfirmation = False
            OptionsData.Inserting = False
            OptionsSelection.HideFocusRectOnExit = False
            OptionsView.CellEndEllipsis = True
            OptionsView.NoDataToDisplayInfoText = '<'#1053#1077#1090' '#1076#1072#1085#1085#1099#1093'>'
            OptionsView.CellAutoHeight = True
            OptionsView.CellTextMaxLineCount = 1
            OptionsView.ColumnAutoWidth = True
            OptionsView.ExpandButtonsForEmptyDetails = False
            OptionsView.Footer = True
            OptionsView.HeaderEndEllipsis = True
            OptionsView.Indicator = True
            Preview.Visible = True
            Styles.OnGetContentStyle = tvLessonStylesGetContentStyle
            Styles.Header = DMInv.cxSiniyText
            object tvLesson_TEACHER_FIO: TcxGridDBColumn
              Caption = #1060#1048#1054' '#1087#1088#1077#1087#1086#1076#1072#1074#1072#1090#1077#1083#1103
              DataBinding.FieldName = 'TEACHER_FIO'
              Options.Editing = False
              SortIndex = 0
              SortOrder = soAscending
              Width = 46
            end
            object tvLessonPP: TcxGridDBColumn
              Caption = #1055#1086#1083#1091#1095'. '#1091#1089#1083#1091#1075
              DataBinding.FieldName = 'PP'
              Options.Editing = False
              SortIndex = 1
              SortOrder = soAscending
              Width = 68
            end
            object tvLessonSDNAME: TcxGridDBColumn
              Caption = #1059#1089#1083#1091#1075#1072
              DataBinding.FieldName = 'SDNAME'
              Options.Editing = False
              Width = 61
            end
            object tvLessonRSDATE: TcxGridDBColumn
              Caption = #1044#1072#1090#1072' '#1087#1088#1086#1074#1077#1076#1077#1085#1080#1103
              DataBinding.FieldName = 'RSDATE'
              Options.Editing = False
              SortIndex = 2
              SortOrder = soAscending
              Width = 42
            end
            object tvLessonRSTIMEBEGIN: TcxGridDBColumn
              Caption = #1042#1088#1077#1084#1103' '#1085#1072#1095'.'
              DataBinding.FieldName = 'RSTIMEBEGIN'
              PropertiesClassName = 'TcxTimeEditProperties'
              Properties.TimeFormat = tfHourMin
              Options.Editing = False
              SortIndex = 3
              SortOrder = soAscending
              Width = 34
            end
            object tvLessonRSTIMEEND: TcxGridDBColumn
              Caption = #1042#1088#1077#1084#1103' '#1086#1082#1086#1085#1095'.'
              DataBinding.FieldName = 'RSTIMEEND'
              PropertiesClassName = 'TcxTimeEditProperties'
              Properties.TimeFormat = tfHourMin
              Options.Editing = False
              Width = 40
            end
            object tvLessonRSOPLATIT: TcxGridDBColumn
              Caption = #1054#1087#1083#1072#1090#1080#1090#1100'?'
              DataBinding.FieldName = 'RSOPLATIT'
              RepositoryItem = DMInv.eriCheckBox
              Styles.OnGetContentStyle = tvLessonRSOPLATITStylesGetContentStyle
              Width = 24
            end
            object tvLessonRSOPLACHENO: TcxGridDBColumn
              Caption = #1054#1087#1083#1072#1095#1077#1085#1086
              DataBinding.FieldName = 'RSOPLACHENO'
              RepositoryItem = DMInv.eriCheckBox
              Options.Editing = False
              Width = 28
            end
            object tvLesson_PAYMENT_DATE: TcxGridDBColumn
              Caption = #1044#1072#1090#1072' '#1086#1087#1083#1072#1090#1099
              DataBinding.FieldName = 'PAYMENT_DATE'
              Options.Editing = False
              Width = 51
            end
            object tvLessonRSPTIMEENTER: TcxGridDBColumn
              Caption = #1044#1072#1090#1072' '#1074#1074#1086#1076#1072
              DataBinding.FieldName = 'RSPTIMEENTER'
              Options.Editing = False
              Width = 36
            end
            object tvLessonOSN_PODR: TcxGridDBColumn
              Caption = #1054#1089#1085'. '#1087#1086#1076#1088'. '#1085#1072' '#1076#1077#1085#1100' '#1079#1072#1085#1103#1090#1080#1103
              DataBinding.FieldName = 'OSN_PODR'
              Options.Editing = False
              Width = 48
            end
            object tvLesson_IS_TIME_CONFLICT: TcxGridDBColumn
              DataBinding.FieldName = 'IS_TIME_CONFLICT'
              Visible = False
              VisibleForCustomization = False
              Width = 74
            end
            object tvLesson_IS_EXIST_TIME_CONFLICT: TcxGridDBColumn
              DataBinding.FieldName = 'IS_EXIST_TIME_CONFLICT'
              Visible = False
              VisibleForCustomization = False
              Width = 74
            end
            object tvLesson_CONFLICT_TEXT: TcxGridDBColumn
              DataBinding.FieldName = 'CONFLICT_TEXT'
              RepositoryItem = DMInv.eriMemo
              Visible = False
              VisibleForCustomization = False
              Width = 14340
            end
            object tvLesson_CONFLICT_NOTE: TcxGridDBColumn
              DataBinding.FieldName = 'CONFLICT_NOTE'
              RepositoryItem = DMInv.eriMemo
              Visible = False
              VisibleForCustomization = False
              Width = 14340
            end
            object tvLesson_CHIEF_NOTE: TcxGridDBColumn
              Caption = #1050#1086#1084#1084#1077#1085#1090#1072#1088#1080#1081' '#1088#1091#1082#1086#1074#1086#1076#1080#1090#1077#1083#1103
              DataBinding.FieldName = 'CHIEF_NOTE'
              RepositoryItem = DMInv.eriBlobEdit
              OnGetCellHint = tvLesson_CHIEF_NOTEGetCellHint
              Options.Editing = False
              Styles.OnGetContentStyle = tvLesson_CHIEF_NOTEStylesGetContentStyle
              Width = 53
            end
            object tvLesson_TTARIF: TcxGridDBColumn
              Caption = #1058#1072#1088#1080#1092
              DataBinding.FieldName = 'TTARIF'
              Options.Editing = False
              Width = 37
            end
            object tvLesson_EDIT_TARIFF: TcxGridDBColumn
              Caption = #1048#1079#1084#1077#1085#1105#1085#1085#1099#1081' '#1090#1072#1088#1080#1092
              DataBinding.FieldName = 'EDIT_TARIFF'
              RepositoryItem = DMInv.eriCalcEdit
              Styles.OnGetContentStyle = tvLesson_EDIT_TARIFFStylesGetContentStyle
              Width = 46
            end
            object tvLesson_RSUSERENTER: TcxGridDBColumn
              Caption = #1060#1048#1054' '#1088#1077#1075#1080#1089#1090#1088#1072#1090#1086#1088#1072
              DataBinding.FieldName = 'RSUSERENTER'
              Options.Editing = False
              Width = 58
            end
            object tvLesson_RSNABLJUD: TcxGridDBColumn
              DataBinding.FieldName = 'RSNABLJUD'
              Visible = False
              VisibleForCustomization = False
            end
            object tvLesson_RSOPLATIT_EDITED: TcxGridDBColumn
              DataBinding.FieldName = 'RSOPLATIT_EDITED'
              Visible = False
              VisibleForCustomization = False
            end
            object tvLesson_CHIEF_NOTE_EDITED: TcxGridDBColumn
              DataBinding.FieldName = 'CHIEF_NOTE_EDITED'
              Visible = False
              VisibleForCustomization = False
            end
            object tvLesson_EDIT_TARIFF_EDITED: TcxGridDBColumn
              DataBinding.FieldName = 'EDIT_TARIFF_EDITED'
              Visible = False
              VisibleForCustomization = False
            end
            object tvLesson_IS_TIME_CONFLICT_LATE: TcxGridDBColumn
              DataBinding.FieldName = 'IS_TIME_CONFLICT_LATE'
              Visible = False
              VisibleForCustomization = False
            end
            object tvLesson_IS_EXIST_TIME_CONFLICT_LATE: TcxGridDBColumn
              DataBinding.FieldName = 'IS_EXIST_TIME_CONFLICT_LATE'
              Visible = False
              VisibleForCustomization = False
            end
            object tvLesson_CONFLICT_LATE_TEXT: TcxGridDBColumn
              DataBinding.FieldName = 'CONFLICT_LATE_TEXT'
              Visible = False
              VisibleForCustomization = False
            end
            object tvLesson_IS_NOT_TO_PAY_WITHOUT_CONFLICT: TcxGridDBColumn
              DataBinding.FieldName = 'IS_NOT_TO_PAY_WITHOUT_CONFLICT'
              Visible = False
              VisibleForCustomization = False
            end
            object tvLesson_IS_WITH_TO_PAY_WITHOUT_PAYMENT: TcxGridDBColumn
              DataBinding.FieldName = 'IS_WITH_TO_PAY_WITHOUT_PAYMENT'
              Visible = False
              VisibleForCustomization = False
            end
          end
          object lvLesson: TcxGridLevel
            GridView = tvLesson
            Options.TabsForEmptyDetails = False
            object lvTimeSheetsWithConflict: TcxGridLevel
              GridView = tvTimeSheetsWithConflict
              Options.TabsForEmptyDetails = False
            end
          end
        end
        object Panel5: TPanel
          Left = 1
          Top = 367
          Width = 1423
          Height = 250
          Align = alBottom
          Caption = 'Panel5'
          TabOrder = 1
          object dbmRSNABLJUD: TcxDBMemo
            Left = 1
            Top = 1
            Align = alLeft
            DataBinding.DataField = 'RSNABLJUD'
            DataBinding.DataSource = dsLesson
            ParentFont = False
            Properties.ReadOnly = True
            Style.Font.Charset = DEFAULT_CHARSET
            Style.Font.Color = clWindowText
            Style.Font.Height = -16
            Style.Font.Name = 'Tahoma'
            Style.Font.Style = []
            Style.LookAndFeel.Kind = lfOffice11
            Style.LookAndFeel.SkinName = 'Office2007Silver'
            Style.IsFontAssigned = True
            StyleDisabled.LookAndFeel.Kind = lfOffice11
            StyleDisabled.LookAndFeel.SkinName = 'Office2007Silver'
            StyleFocused.LookAndFeel.Kind = lfOffice11
            StyleFocused.LookAndFeel.SkinName = 'Office2007Silver'
            StyleHot.LookAndFeel.Kind = lfOffice11
            StyleHot.LookAndFeel.SkinName = 'Office2007Silver'
            TabOrder = 0
            Height = 180
            Width = 184
          end
          object dbmRSTEMA: TcxDBMemo
            Left = 193
            Top = 1
            Align = alClient
            DataBinding.DataField = 'RSTEMA'
            DataBinding.DataSource = dsLesson
            ParentFont = False
            Properties.ReadOnly = True
            Style.Font.Charset = DEFAULT_CHARSET
            Style.Font.Color = clWindowText
            Style.Font.Height = -16
            Style.Font.Name = 'Tahoma'
            Style.Font.Style = []
            Style.LookAndFeel.Kind = lfOffice11
            Style.LookAndFeel.SkinName = 'Office2007Silver'
            Style.IsFontAssigned = True
            StyleDisabled.LookAndFeel.Kind = lfOffice11
            StyleDisabled.LookAndFeel.SkinName = 'Office2007Silver'
            StyleFocused.LookAndFeel.Kind = lfOffice11
            StyleFocused.LookAndFeel.SkinName = 'Office2007Silver'
            StyleHot.LookAndFeel.Kind = lfOffice11
            StyleHot.LookAndFeel.SkinName = 'Office2007Silver'
            TabOrder = 1
            Height = 180
            Width = 871
          end
          object cxSplitter4: TcxSplitter
            Left = 185
            Top = 1
            Width = 8
            Height = 180
            HotZoneClassName = 'TcxMediaPlayer9Style'
            Control = dbmRSNABLJUD
          end
          object pnConflict: TPanel
            Left = 1072
            Top = 1
            Width = 350
            Height = 180
            Align = alRight
            TabOrder = 3
            object pnStandartConflict: TPanel
              Left = 1
              Top = 1
              Width = 184
              Height = 178
              Align = alClient
              TabOrder = 0
              object dbmCONFLICT_NOTE: TcxDBMemo
                Left = 1
                Top = 92
                Align = alClient
                DataBinding.DataField = 'CONFLICT_NOTE'
                DataBinding.DataSource = dsLesson
                ParentFont = False
                Properties.ReadOnly = True
                Properties.ScrollBars = ssVertical
                Style.Font.Charset = DEFAULT_CHARSET
                Style.Font.Color = clWindowText
                Style.Font.Height = -16
                Style.Font.Name = 'Tahoma'
                Style.Font.Style = []
                Style.LookAndFeel.Kind = lfOffice11
                Style.LookAndFeel.SkinName = 'Office2007Silver'
                Style.IsFontAssigned = True
                StyleDisabled.LookAndFeel.Kind = lfOffice11
                StyleDisabled.LookAndFeel.SkinName = 'Office2007Silver'
                StyleFocused.LookAndFeel.Kind = lfOffice11
                StyleFocused.LookAndFeel.SkinName = 'Office2007Silver'
                StyleHot.LookAndFeel.Kind = lfOffice11
                StyleHot.LookAndFeel.SkinName = 'Office2007Silver'
                TabOrder = 0
                Height = 85
                Width = 182
              end
              object dbmCONFLICT_TEXT: TcxDBMemo
                Left = 1
                Top = 1
                Align = alTop
                DataBinding.DataField = 'CONFLICT_TEXT'
                DataBinding.DataSource = dsLesson
                ParentFont = False
                Properties.ReadOnly = True
                Properties.ScrollBars = ssVertical
                Style.Font.Charset = DEFAULT_CHARSET
                Style.Font.Color = clWindowText
                Style.Font.Height = -16
                Style.Font.Name = 'Tahoma'
                Style.Font.Style = []
                Style.LookAndFeel.Kind = lfOffice11
                Style.LookAndFeel.SkinName = 'Office2007Silver'
                Style.IsFontAssigned = True
                StyleDisabled.LookAndFeel.Kind = lfOffice11
                StyleDisabled.LookAndFeel.SkinName = 'Office2007Silver'
                StyleFocused.LookAndFeel.Kind = lfOffice11
                StyleFocused.LookAndFeel.SkinName = 'Office2007Silver'
                StyleHot.LookAndFeel.Kind = lfOffice11
                StyleHot.LookAndFeel.SkinName = 'Office2007Silver'
                TabOrder = 1
                Height = 83
                Width = 182
              end
              object cxSplitter6: TcxSplitter
                Left = 1
                Top = 84
                Width = 182
                Height = 8
                HotZoneClassName = 'TcxMediaPlayer9Style'
                AlignSplitter = salTop
                Control = dbmCONFLICT_TEXT
              end
            end
            object dbmCONFLICT_LATE_TEXT: TcxDBMemo
              Left = 193
              Top = 1
              Align = alRight
              DataBinding.DataField = 'CONFLICT_LATE_TEXT'
              DataBinding.DataSource = dsLesson
              ParentFont = False
              Properties.ReadOnly = True
              Properties.ScrollBars = ssVertical
              Style.Font.Charset = DEFAULT_CHARSET
              Style.Font.Color = clWindowText
              Style.Font.Height = -16
              Style.Font.Name = 'Tahoma'
              Style.Font.Style = []
              Style.LookAndFeel.Kind = lfOffice11
              Style.LookAndFeel.SkinName = 'Office2007Silver'
              Style.IsFontAssigned = True
              StyleDisabled.LookAndFeel.Kind = lfOffice11
              StyleDisabled.LookAndFeel.SkinName = 'Office2007Silver'
              StyleFocused.LookAndFeel.Kind = lfOffice11
              StyleFocused.LookAndFeel.SkinName = 'Office2007Silver'
              StyleHot.LookAndFeel.Kind = lfOffice11
              StyleHot.LookAndFeel.SkinName = 'Office2007Silver'
              TabOrder = 1
              Height = 178
              Width = 156
            end
            object cxSplitter1: TcxSplitter
              Left = 185
              Top = 1
              Width = 8
              Height = 178
              HotZoneClassName = 'TcxMediaPlayer9Style'
              AlignSplitter = salRight
              Control = dbmCONFLICT_LATE_TEXT
            end
          end
          object cxSplitter3: TcxSplitter
            Left = 1064
            Top = 1
            Width = 8
            Height = 180
            HotZoneClassName = 'TcxMediaPlayer9Style'
            AlignSplitter = salRight
            Control = pnConflict
          end
          object gbControlLesson: TcxGroupBox
            Left = 1
            Top = 189
            Align = alBottom
            Caption = #1051#1077#1075#1077#1085#1076#1072
            Style.LookAndFeel.Kind = lfOffice11
            Style.LookAndFeel.SkinName = 'Office2007Silver'
            StyleDisabled.LookAndFeel.Kind = lfOffice11
            StyleDisabled.LookAndFeel.SkinName = 'Office2007Silver'
            StyleFocused.LookAndFeel.Kind = lfOffice11
            StyleFocused.LookAndFeel.SkinName = 'Office2007Silver'
            StyleHot.LookAndFeel.Kind = lfOffice11
            StyleHot.LookAndFeel.SkinName = 'Office2007Silver'
            TabOrder = 5
            Height = 60
            Width = 1421
            object cxLabel2: TcxLabel
              Left = 5
              Top = 16
              Caption = #1053#1072#1083#1080#1095#1080#1077' '#1089#1080#1089#1090#1077#1084#1085#1086#1075#1086' '#1082#1086#1085#1092#1083#1080#1082#1090#1072
              ParentColor = False
              Style.Color = 16749567
            end
            object cxLabel3: TcxLabel
              Left = 5
              Top = 36
              Caption = #1053#1072#1083#1080#1095#1080#1077' '#1089#1074#1103#1079#1072#1085#1085#1086#1075#1086' '#1089#1080#1089#1090#1077#1084#1085#1086#1075#1086' '#1082#1086#1085#1092#1083#1080#1082#1090#1072
              ParentColor = False
              Style.Color = 16760445
              Style.TextColor = clWhite
            end
            object cxLabel4: TcxLabel
              Left = 336
              Top = 16
              Caption = #1057#1086#1095#1077#1090#1072#1085#1080#1077' '#1089#1080#1089#1090#1077#1084#1085#1086#1075#1086' '#1082#1086#1085#1092#1083#1080#1082#1090#1072' '#1080' '#1089#1074#1103#1079#1072#1085#1085#1086#1075#1086' '#1089#1080#1089#1090#1077#1084#1085#1086#1075#1086' '#1082#1086#1085#1092#1083#1080#1082#1090#1072
              ParentColor = False
              Style.Color = 16756912
              Style.TextColor = 8454143
            end
            object cxLabel5: TcxLabel
              Left = 336
              Top = 36
              Caption = #1055#1086#1083#1077' '#1073#1099#1083#1086' '#1086#1090#1088#1077#1076#1072#1082#1090#1080#1088#1086#1074#1072#1085#1086
              ParentColor = False
              Style.Color = 9568200
            end
            object cxLabel6: TcxLabel
              Left = 787
              Top = 16
              Caption = #1054#1087#1083#1072#1095#1077#1085#1085#1099#1077
              ParentColor = False
              Style.Color = clGreen
              Style.TextColor = clWhite
            end
          end
          object cxSplitter2: TcxSplitter
            Left = 1
            Top = 181
            Width = 1421
            Height = 8
            HotZoneClassName = 'TcxMediaPlayer9Style'
            AlignSplitter = salBottom
            Control = gbControlLesson
          end
        end
        object cxSplitter5: TcxSplitter
          Left = 1
          Top = 359
          Width = 1423
          Height = 8
          HotZoneClassName = 'TcxMediaPlayer9Style'
          AlignSplitter = salBottom
          Control = Panel5
        end
        object pnButtons: TPanel
          Left = 1
          Top = 1
          Width = 1423
          Height = 110
          Align = alTop
          TabOrder = 3
          OnResize = pnButtonsResize
          object bdcLessons: TdxBarDockControl
            Left = 1
            Top = 1
            Width = 1421
            Height = 106
            Align = dalTop
            BarManager = bmControlLesson
          end
        end
      end
    end
    object tsTeachers: TcxTabSheet
      Caption = #1055#1088#1077#1087#1086#1076#1072#1074#1072#1090#1077#1083#1080
      ImageIndex = 0
      object Panel3: TPanel
        Left = 0
        Top = 51
        Width = 1425
        Height = 567
        Align = alClient
        Caption = 'Panel3'
        Constraints.MinWidth = 720
        TabOrder = 0
        object gdTeachers: TcxGrid
          Left = 1
          Top = 1
          Width = 1423
          Height = 565
          Align = alClient
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          LookAndFeel.Kind = lfOffice11
          LookAndFeel.SkinName = 'Office2007Silver'
          object tvTeachers: TcxGridDBTableView
            NavigatorButtons.ConfirmDelete = False
            NavigatorButtons.PriorPage.Visible = True
            NavigatorButtons.Next.Visible = True
            NavigatorButtons.Insert.Visible = True
            NavigatorButtons.Append.Visible = False
            NavigatorButtons.Edit.Visible = False
            NavigatorButtons.Post.Visible = True
            NavigatorButtons.Cancel.Visible = False
            NavigatorButtons.Refresh.Visible = False
            NavigatorButtons.SaveBookmark.Visible = False
            NavigatorButtons.GotoBookmark.Visible = False
            NavigatorButtons.Filter.Visible = False
            OnEditing = tvTeachersEditing
            DataController.DataSource = dlgDS
            DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
            DataController.Summary.DefaultGroupSummaryItems = <>
            DataController.Summary.FooterSummaryItems = <
              item
                Format = #1050#1086#1083'-'#1074#1086':,0'
                Kind = skCount
                FieldName = 'PP'
                Column = tvTeachersPP
              end
              item
                Format = #1057#1091#1084#1084#1072' '#1074#1099#1087#1083#1072#1095#1077#1085#1085#1099#1093':,0.00'
                Kind = skSum
                FieldName = 'AMOUNT_UJE_VYPLATILI'
                Column = tvTeachersAMOUNT_UJE_VYPLATILI
              end
              item
                Format = #1057#1091#1084#1084#1072' '#1082' '#1086#1087#1083#1072#1090#1077':,0.00'
                Kind = skSum
                FieldName = 'AMOUNT_VYPLATIT'
                Column = tvTeachersAMOUNT_VYPLATIT
              end
              item
                Format = #1057#1091#1084#1084#1072' '#1082' '#1086#1087#1083#1072#1090#1077' '#1079#1072' '#1087#1077#1088#1080#1086#1076':,0.00'
                Kind = skSum
                FieldName = 'VYPLATIT_PERIOD'
                Column = tvTeachersVYPLATIT_PERIOD
              end
              item
                Format = #1057#1091#1084#1084#1072' '#1086#1087#1083#1072#1095#1077#1085#1085#1099#1093' '#1079#1072#1085#1103#1090#1080#1081' '#1079#1072' '#1087#1077#1088#1080#1086#1076':,0.00'
                Kind = skSum
                FieldName = 'UJE_VYPL_PERIOD'
                Column = tvTeachersUJE_VYPL_PERIOD
              end
              item
                Format = #1050#1086#1083'-'#1074#1086' '#1086#1087#1083#1072#1095#1077#1085#1085#1099#1093':,0'
                Kind = skSum
                Column = tvTeachers_COUNT_PAYMENT
              end
              item
                Format = #1057#1091#1084#1084#1072', '#1086#1087#1083#1072#1095#1077#1085#1085#1072#1103' '#1079#1072' '#1087#1077#1088#1080#1086#1076':,0.00'
                Kind = skSum
                Column = tvTeachers_AMOUNT_PAYMENT
              end
              item
                Format = #1050#1086#1083'-'#1074#1086' '#1086#1090#1084#1077#1095#1077#1085#1085#1099#1093':,0'
                Kind = skSum
                Column = tvTeachersOPLACHENO
              end
              item
                Format = #1050#1086#1083'-'#1074#1086' '#1082' '#1086#1087#1083#1072#1090#1077':,0'
                Kind = skSum
                Column = tvTeachersKOPLATE
              end>
            DataController.Summary.SummaryGroups = <>
            OptionsBehavior.CellHints = True
            OptionsCustomize.ColumnFiltering = False
            OptionsData.CancelOnExit = False
            OptionsData.Deleting = False
            OptionsData.DeletingConfirmation = False
            OptionsData.Inserting = False
            OptionsView.CellEndEllipsis = True
            OptionsView.NoDataToDisplayInfoText = '<'#1053#1077#1090' '#1076#1072#1085#1085#1099#1093'>'
            OptionsView.CellAutoHeight = True
            OptionsView.CellTextMaxLineCount = 1
            OptionsView.ColumnAutoWidth = True
            OptionsView.Footer = True
            OptionsView.GroupByBox = False
            OptionsView.HeaderEndEllipsis = True
            OptionsView.Indicator = True
            Preview.Visible = True
            Styles.Header = DMInv.cxSiniyText
            object tvTeachersPP: TcxGridDBColumn
              Caption = #1055#1088#1077#1087#1086#1076#1072#1074#1072#1090#1077#1083#1100
              DataBinding.FieldName = 'PP'
              Options.Editing = False
              Width = 98
            end
            object tvTeachersAMOUNT_VYPLATIT: TcxGridDBColumn
              Caption = #1050' '#1086#1087#1083#1072#1090#1077
              DataBinding.FieldName = 'AMOUNT_VYPLATIT'
              Options.Editing = False
              Width = 70
            end
            object tvTeachersKOPLATE: TcxGridDBColumn
              Caption = #1050' '#1086#1087#1083#1072#1090#1077' '#1096#1090
              DataBinding.FieldName = 'KOPLATE'
              Options.Editing = False
              Width = 64
            end
            object tvTeachersAMOUNT_UJE_VYPLATILI: TcxGridDBColumn
              Caption = #1059#1078#1077' '#1074#1099#1087#1083#1072#1090#1080#1083#1080
              DataBinding.FieldName = 'AMOUNT_UJE_VYPLATILI'
              Options.Editing = False
              Width = 69
            end
            object tvTeachersOPLACHENO_: TcxGridDBColumn
              Caption = #1059#1078#1077' '#1086#1087#1083'. '#1096#1090'.'
              DataBinding.FieldName = 'OPLACHENO_'
              Options.Editing = False
              Width = 65
            end
            object tvTeachersVYPLATIT_PERIOD: TcxGridDBColumn
              Caption = #1050' '#1086#1087#1083'. '#1079#1072' '#1087#1077#1088#1080#1086#1076
              DataBinding.FieldName = 'VYPLATIT_PERIOD'
              Options.Editing = False
              Width = 76
            end
            object tvTeachersUJE_VYPL_PERIOD: TcxGridDBColumn
              Caption = #1059#1078#1077' '#1086#1087#1083'. '#1079#1072#1085#1103#1090#1080#1103' '#1079#1072' '#1087#1077#1088#1080#1086#1076
              DataBinding.FieldName = 'UJE_VYPL_PERIOD'
              Options.Editing = False
              Width = 74
            end
            object tvTeachers_COUNT_PAYMENT: TcxGridDBColumn
              Caption = #1050#1086#1083'-'#1074#1086' '#1086#1087#1083#1072#1095#1077#1085#1085#1099#1093' '#1079#1072' '#1087#1077#1088#1080#1086#1076
              DataBinding.FieldName = 'COUNT_PAYMENT'
              Options.Editing = False
              Width = 78
            end
            object tvTeachers_AMOUNT_PAYMENT: TcxGridDBColumn
              Caption = #1054#1087#1083#1072#1095#1077#1085#1086' '#1079#1072' '#1087#1077#1088#1080#1086#1076
              DataBinding.FieldName = 'AMOUNT_PAYMENT'
              Options.Editing = False
              Width = 76
            end
            object tvTeachersOPLACHENO: TcxGridDBColumn
              Caption = #1054#1087#1083#1072#1095#1077#1085#1086'?'
              DataBinding.FieldName = 'OPLACHENO'
              PropertiesClassName = 'TcxCheckBoxProperties'
              Properties.ImmediatePost = True
              Properties.NullStyle = nssUnchecked
              Properties.ValueChecked = 1
              Properties.ValueUnchecked = 0
              Visible = False
              Width = 73
            end
          end
          object lvTeachers: TcxGridLevel
            GridView = tvTeachers
          end
        end
      end
      object bdcTeachers: TdxBarDockControl
        Left = 0
        Top = 0
        Width = 1425
        Height = 51
        Align = dalTop
        BarManager = bmControlLesson
      end
    end
  end
  inherited dlgDS: TDataSource
    DataSet = cdsTeachers
    Left = 64
    Top = 87
  end
  object dsLesson: TDataSource
    DataSet = cdsLesson
    Left = 374
    Top = 112
  end
  object SD1: TSaveDialog
    InitialDir = 'c:\'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
    Left = 168
    Top = 120
  end
  object cdsLesson: TClientDataSet
    Aggregates = <>
    Params = <>
    AfterPost = cdsLessonAfterPost
    Left = 320
    Top = 112
  end
  object bmControlLesson: TdxBarManager
    AllowReset = False
    AutoDockColor = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Segoe UI'
    Font.Style = []
    Categories.Strings = (
      'Default'
      'LessonsFilters'
      'LessonsActions'
      'TeachersFilters'
      'TeacherActions')
    Categories.ItemsVisibles = (
      2
      2
      2
      2
      2)
    Categories.Visibles = (
      True
      True
      True
      True
      True)
    DockColor = clBtnFace
    ImageOptions.Images = DMInv.cxSmallImages
    LookAndFeel.Kind = lfOffice11
    LookAndFeel.NativeStyle = False
    LookAndFeel.SkinName = 'Office2007Silver'
    NotDocking = [dsNone, dsLeft, dsTop, dsRight, dsBottom]
    PopupMenuLinks = <>
    Style = bmsUseLookAndFeel
    UseSystemFont = True
    Left = 720
    Top = 8
    DockControlHeights = (
      0
      0
      0
      0)
    object bmControlLessonBar1: TdxBar
      AllowClose = False
      AllowCustomizing = False
      AllowQuickCustomizing = False
      AllowReset = False
      Caption = #1047#1072#1085#1103#1090#1080#1103' ('#1092#1080#1083#1100#1090#1088#1099')_1'
      CaptionButtons = <>
      DockControl = bdcLessons
      DockedDockControl = bdcLessons
      DockedLeft = 0
      DockedTop = 0
      FloatLeft = 201
      FloatTop = 108
      FloatClientWidth = 0
      FloatClientHeight = 0
      ItemLinks = <
        item
          Visible = True
          ItemName = 'beDates'
        end
        item
          BeginGroup = True
          Visible = True
          ItemName = 'beChildren'
        end
        item
          Visible = True
          ItemName = 'dxBarButton2'
        end
        item
          BeginGroup = True
          Visible = True
          ItemName = 'beTeachers'
        end
        item
          Visible = True
          ItemName = 'dxBarButton3'
        end
        item
          BeginGroup = True
          Visible = True
          ItemName = 'beServices'
        end
        item
          Visible = True
          ItemName = 'dxBarButton4'
        end>
      MultiLine = True
      OneOnRow = True
      Row = 0
      UseOwnFont = False
      Visible = True
      WholeRow = False
    end
    object bmControlLessonBar2: TdxBar
      AllowClose = False
      AllowCustomizing = False
      AllowQuickCustomizing = False
      AllowReset = False
      Caption = #1047#1072#1085#1103#1090#1080#1103' ('#1086#1087#1077#1088#1072#1094#1080#1080')'
      CaptionButtons = <>
      DockControl = bdcLessons
      DockedDockControl = bdcLessons
      DockedLeft = 0
      DockedTop = 81
      FloatLeft = 201
      FloatTop = 108
      FloatClientWidth = 0
      FloatClientHeight = 0
      ItemLinks = <
        item
          Visible = True
          ItemName = 'dxBarButton1'
        end
        item
          BeginGroup = True
          Visible = True
          ItemName = 'dxBarSubItem1'
        end
        item
          Visible = True
          ItemName = 'dxBarButton6'
        end
        item
          Visible = True
          ItemName = 'dxBarButton7'
        end
        item
          BeginGroup = True
          Visible = True
          ItemName = 'dxBarButton8'
        end
        item
          Visible = True
          ItemName = 'dxBarButton9'
        end>
      NotDocking = [dsNone, dsLeft, dsTop, dsRight, dsBottom]
      OneOnRow = True
      Row = 2
      UseOwnFont = False
      Visible = True
      WholeRow = True
    end
    object bmControlLessonBar3: TdxBar
      AllowClose = False
      AllowCustomizing = False
      AllowQuickCustomizing = False
      AllowReset = False
      Caption = #1047#1072#1085#1103#1090#1080#1103' ('#1092#1080#1083#1100#1090#1088#1099')_2'
      CaptionButtons = <>
      DockControl = bdcLessons
      DockedDockControl = bdcLessons
      DockedLeft = 0
      DockedTop = 26
      FloatLeft = 190
      FloatTop = 119
      FloatClientWidth = 0
      FloatClientHeight = 0
      ItemLinks = <
        item
          Visible = True
          ItemName = 'beToPay'
        end
        item
          BeginGroup = True
          Visible = True
          ItemName = 'beConflicts'
        end
        item
          BeginGroup = True
          Visible = True
          ItemName = 'bePayment'
        end
        item
          BeginGroup = True
          Visible = True
          ItemName = 'beLessonConflictsShow'
        end>
      MultiLine = True
      OneOnRow = True
      Row = 1
      UseOwnFont = False
      Visible = True
      WholeRow = True
    end
    object bmControlLessonBar4: TdxBar
      AllowClose = False
      AllowCustomizing = False
      AllowQuickCustomizing = False
      AllowReset = False
      Caption = #1055#1088#1077#1087#1086#1076#1072#1074#1072#1090#1077#1083#1080' ('#1092#1080#1083#1100#1090#1088#1099')'
      CaptionButtons = <>
      DockControl = bdcTeachers
      DockedDockControl = bdcTeachers
      DockedLeft = 0
      DockedTop = 0
      FloatLeft = 190
      FloatTop = 119
      FloatClientWidth = 0
      FloatClientHeight = 0
      ItemLinks = <
        item
          Visible = True
          ItemName = 'beTeacherDates'
        end
        item
          BeginGroup = True
          Visible = True
          ItemName = 'beTeacherPaymentDates'
        end
        item
          BeginGroup = True
          Visible = True
          ItemName = 'beTeacherPayment'
        end>
      OneOnRow = True
      Row = 0
      UseOwnFont = False
      Visible = True
      WholeRow = False
    end
    object bmControlLessonBar5: TdxBar
      AllowClose = False
      AllowCustomizing = False
      AllowQuickCustomizing = False
      AllowReset = False
      Caption = #1055#1088#1077#1087#1086#1076#1072#1074#1072#1090#1077#1083#1080' ('#1086#1087#1077#1088#1072#1094#1080#1080')'
      CaptionButtons = <>
      DockControl = bdcTeachers
      DockedDockControl = bdcTeachers
      DockedLeft = 0
      DockedTop = 26
      FloatLeft = 190
      FloatTop = 119
      FloatClientWidth = 0
      FloatClientHeight = 0
      ItemLinks = <
        item
          Visible = True
          ItemName = 'dxBarButton11'
        end
        item
          BeginGroup = True
          Visible = True
          ItemName = 'dxBarButton10'
        end
        item
          Visible = True
          ItemName = 'dxBarButton12'
        end>
      OneOnRow = True
      Row = 1
      UseOwnFont = False
      Visible = True
      WholeRow = False
    end
    object beDates: TcxBarEditItem
      Action = actDateInterval
      Category = 1
      Style = DMInv.stlCaption
      OnChange = beDatesChange
      ShowCaption = True
      Width = 200
      PropertiesClassName = 'TcxButtonEditProperties'
      Properties.Buttons = <
        item
          Default = True
        end>
      Properties.OnButtonClick = beDatesPropertiesButtonClick
      StyleEdit = DMInv.stlCaption
    end
    object beChildren: TcxBarEditItem
      Action = actChildren
      Category = 1
      Style = DMInv.stlCaption
      OnChange = beChildrenChange
      OnEnter = beChildrenEnter
      ShowCaption = True
      Width = 200
      PropertiesClassName = 'TcxExtLookupComboBoxProperties'
      Properties.DropDownAutoSize = True
      Properties.DropDownSizeable = True
      Properties.FocusPopup = True
      Properties.ImmediatePost = True
      Properties.View = tvChildrenList
      Properties.KeyFieldNames = 'PID'
      Properties.ListFieldItem = tvChildrenList_FIO
      Properties.OnEditValueChanged = beChildrenPropertiesEditValueChanged
      Properties.OnInitPopup = beChildrenPropertiesInitPopup
      StyleEdit = DMInv.stlCaption
    end
    object beTeachers: TcxBarEditItem
      Action = actTeacher
      Category = 1
      Style = DMInv.stlCaption
      OnChange = beTeachersChange
      OnEnter = beTeachersEnter
      ShowCaption = True
      Width = 200
      PropertiesClassName = 'TcxExtLookupComboBoxProperties'
      Properties.DropDownAutoSize = True
      Properties.DropDownSizeable = True
      Properties.FocusPopup = True
      Properties.ImmediatePost = True
      Properties.View = tvTeachersList
      Properties.KeyFieldNames = 'ID_USER'
      Properties.ListFieldItem = tvTeachersList_FIO
      Properties.OnEditValueChanged = beTeachersPropertiesEditValueChanged
      Properties.OnInitPopup = beTeachersPropertiesInitPopup
      StyleEdit = DMInv.stlCaption
    end
    object beServices: TcxBarEditItem
      Action = actService
      Category = 1
      Style = DMInv.stlCaption
      OnChange = beServicesChange
      OnEnter = beServicesEnter
      ShowCaption = True
      Width = 200
      PropertiesClassName = 'TcxExtLookupComboBoxProperties'
      Properties.DropDownAutoSize = True
      Properties.DropDownSizeable = True
      Properties.ImmediatePost = True
      Properties.View = tvServices
      Properties.KeyFieldNames = 'SDID'
      Properties.ListFieldItem = tvServices_SDNAME
      Properties.OnEditValueChanged = beServicesPropertiesEditValueChanged
      Properties.OnInitPopup = beServicesPropertiesInitPopup
      StyleEdit = DMInv.stlCaption
    end
    object beToPay: TcxBarEditItem
      Action = actToPay
      Category = 1
      Style = DMInv.stlCaption
      OnEnter = beToPayEnter
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxRadioGroupProperties'
      Properties.Columns = 3
      Properties.DefaultValue = 2
      Properties.ImmediatePost = True
      Properties.Items = <
        item
          Caption = #1053#1077#1086#1090#1084#1077#1095#1077#1085#1085#1099#1077
          Value = 0
        end
        item
          Caption = #1054#1090#1084#1077#1095#1077#1085#1085#1099#1077
          Value = 1
        end
        item
          Caption = #1042#1089#1077
          Value = 2
        end>
      Properties.OnEditValueChanged = beToPayPropertiesEditValueChanged
      StyleEdit = DMInv.stlCaption
    end
    object beConflicts: TcxBarEditItem
      Action = actConflicts
      Category = 1
      Style = DMInv.stlCaption
      OnEnter = beConflictsEnter
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxRadioGroupProperties'
      Properties.Columns = 3
      Properties.DefaultValue = 2
      Properties.ImmediatePost = True
      Properties.Items = <
        item
          Caption = #1041#1077#1079' '#1082#1086#1085#1092#1083#1080#1082#1090#1072
          Value = 0
        end
        item
          Caption = #1057' '#1082#1086#1085#1092#1083#1080#1082#1090#1086#1084
          Value = 1
        end
        item
          Caption = #1042#1089#1077
          Value = 2
        end>
      Properties.OnEditValueChanged = beConflictsPropertiesEditValueChanged
      StyleEdit = DMInv.stlCaption
    end
    object bePayment: TcxBarEditItem
      Action = actPayment
      Category = 1
      Style = DMInv.stlCaption
      OnEnter = bePaymentEnter
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxRadioGroupProperties'
      Properties.Columns = 3
      Properties.DefaultValue = 2
      Properties.ImmediatePost = True
      Properties.Items = <
        item
          Caption = #1053#1077' '#1086#1087#1083#1072#1095#1077#1085#1086
          Value = 0
        end
        item
          Caption = #1054#1087#1083#1072#1095#1077#1085#1086
          Value = 1
        end
        item
          Caption = #1042#1089#1077
          Value = 2
        end>
      Properties.OnEditValueChanged = bePaymentPropertiesEditValueChanged
      StyleEdit = DMInv.stlCaption
    end
    object dxBarButton2: TdxBarButton
      Action = actChildrenClear
      Category = 1
    end
    object dxBarButton3: TdxBarButton
      Action = actTeacherClear
      Category = 1
    end
    object dxBarButton4: TdxBarButton
      Action = actServiceClear
      Category = 1
    end
    object beLessonConflictsShow: TcxBarEditItem
      Action = actLessonConflictsShow
      Category = 1
      Style = DMInv.stlCaption
      OnEnter = beLessonConflictsShowEnter
      ShowCaption = True
      Width = 10
      PropertiesClassName = 'TcxCheckBoxProperties'
      Properties.ImmediatePost = True
      Properties.NullStyle = nssUnchecked
      Properties.OnEditValueChanged = beLessonConflictsShowPropertiesEditValueChanged
      StyleEdit = DMInv.stlCaption
    end
    object dxBarButton1: TdxBarButton
      Action = actLessonUpdate
      Category = 2
      Lowered = True
      PaintStyle = psCaptionGlyph
    end
    object dxBarSubItem1: TdxBarSubItem
      Action = actToPaySubItem
      Category = 2
      ItemLinks = <
        item
          Visible = True
          ItemName = 'dxBarButton5'
        end
        item
          Visible = True
          ItemName = 'dxBarButton6'
        end>
    end
    object dxBarButton5: TdxBarButton
      Action = actToPayAll
      Category = 2
    end
    object dxBarButton6: TdxBarButton
      Action = actTpPayWithoutConflict
      Category = 2
      Lowered = True
    end
    object dxBarButton7: TdxBarButton
      Action = actToPayClear
      Category = 2
      Lowered = True
    end
    object dxBarButton8: TdxBarButton
      Action = actLessonSave
      Category = 2
      Lowered = True
      PaintStyle = psCaptionGlyph
    end
    object dxBarButton9: TdxBarButton
      Action = actLessonCancel
      Category = 2
      Lowered = True
      PaintStyle = psCaptionGlyph
    end
    object beTeacherDates: TcxBarEditItem
      Action = actTeacherDateInterval
      Category = 3
      Style = DMInv.stlCaption
      OnChange = beTeacherDatesChange
      ShowCaption = True
      Width = 200
      PropertiesClassName = 'TcxButtonEditProperties'
      Properties.Buttons = <
        item
          Default = True
        end>
      Properties.OnButtonClick = beTeacherDatesPropertiesButtonClick
      StyleEdit = DMInv.stlCaption
    end
    object beTeacherPayment: TcxBarEditItem
      Action = actTeacherPayment
      Category = 3
      Style = DMInv.stlCaption
      OnEnter = beTeacherPaymentEnter
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxRadioGroupProperties'
      Properties.Columns = 2
      Properties.ImmediatePost = True
      Properties.Items = <
        item
          Caption = #1053#1077' '#1086#1087#1083#1072#1095#1077#1085#1085#1099#1077
          Value = 0
        end
        item
          Caption = #1042#1089#1077
          Value = 1
        end>
      Properties.OnEditValueChanged = beTeacherPaymentPropertiesEditValueChanged
      StyleEdit = DMInv.stlCaption
    end
    object beTeacherPaymentDates: TcxBarEditItem
      Action = actTeacherPaymentDateInterval
      Category = 3
      Style = DMInv.stlCaption
      OnChange = beTeacherPaymentDatesChange
      ShowCaption = True
      Width = 200
      PropertiesClassName = 'TcxButtonEditProperties'
      Properties.Buttons = <
        item
          Default = True
        end>
      Properties.OnButtonClick = beTeacherPaymentDatesPropertiesButtonClick
      StyleEdit = DMInv.stlCaption
    end
    object dxBarButton11: TdxBarButton
      Action = actTeachersUpdate
      Category = 4
    end
    object dxBarButton10: TdxBarButton
      Action = actTeachersExcelExport
      Category = 4
    end
    object dxBarButton12: TdxBarButton
      Action = actTeachersSave
      Category = 4
    end
  end
  object alControlLesson: TActionList
    Images = DMInv.cxSmallImages
    Left = 643
    Top = 8
    object actDateInterval: TAction
      Category = 'LessonsFilters'
      Caption = #1055#1077#1088#1080#1086#1076' '#1076#1083#1103' '#1076#1086#1087'. '#1091#1089#1083#1091#1075
      Hint = #1042#1099#1073#1086#1088' '#1087#1077#1088#1080#1086#1076#1072' '#1076#1083#1103' '#1076#1086#1087'. '#1091#1089#1083#1091#1075
      OnExecute = actDateIntervalExecute
    end
    object actToPay: TAction
      Category = 'LessonsFilters'
      Caption = #1054#1087#1083#1072#1090#1080#1090#1100':'
      Hint = #1054#1087#1083#1072#1090#1080#1090#1100
      OnExecute = actToPayExecute
    end
    object actLessonUpdate: TAction
      Category = 'LessonsActions'
      Caption = #1054#1073#1085#1086#1074#1080#1090#1100
      Hint = #1054#1073#1085#1086#1074#1080#1090#1100
      ImageIndex = 63
      OnExecute = actLessonUpdateExecute
    end
    object actChildren: TAction
      Category = 'LessonsFilters'
      Caption = #1060#1048#1054' '#1091#1095#1077#1085#1080#1082#1072
      Hint = #1060#1048#1054' '#1091#1095#1077#1085#1080#1082#1072
      OnExecute = actChildrenExecute
    end
    object actTeacher: TAction
      Category = 'LessonsFilters'
      Caption = #1060#1048#1054' '#1087#1088#1077#1087#1086#1076#1072#1074#1072#1090#1077#1083#1103
      Hint = #1060#1048#1054' '#1087#1088#1077#1087#1086#1076#1072#1074#1072#1090#1077#1083#1103
      OnExecute = actTeacherExecute
    end
    object actService: TAction
      Category = 'LessonsFilters'
      Caption = #1059#1089#1083#1091#1075#1072
      Hint = #1059#1089#1083#1091#1075#1072
      OnExecute = actServiceExecute
    end
    object actConflicts: TAction
      Category = 'LessonsFilters'
      Caption = #1050#1086#1085#1092#1083#1080#1082#1090#1099':'
      Hint = #1050#1086#1085#1092#1083#1080#1082#1090#1099
      OnExecute = actConflictsExecute
    end
    object actPayment: TAction
      Category = 'LessonsFilters'
      Caption = #1054#1087#1083#1072#1090#1099':'
      Hint = #1054#1087#1083#1072#1090#1099
      OnExecute = actPaymentExecute
    end
    object actChildrenClear: TAction
      Category = 'LessonsActions'
      Caption = #1054#1095#1080#1089#1090#1080#1090#1100
      Hint = #1054#1095#1080#1089#1090#1080#1090#1100' '#1079#1085#1072#1095#1077#1085#1080#1077' '#1092#1080#1083#1100#1090#1088#1072' '#1087#1086' '#1091#1095#1077#1085#1080#1082#1072#1084
      ImageIndex = 67
      OnExecute = actChildrenClearExecute
    end
    object actTeacherClear: TAction
      Category = 'LessonsActions'
      Caption = #1054#1095#1080#1089#1090#1080#1090#1100
      Hint = #1054#1095#1080#1089#1090#1080#1090#1100' '#1079#1085#1072#1095#1077#1085#1080#1077' '#1092#1080#1083#1100#1090#1088#1072' '#1087#1086' '#1087#1088#1077#1087#1086#1076#1072#1074#1072#1090#1077#1083#1103#1084
      ImageIndex = 67
      OnExecute = actTeacherClearExecute
    end
    object actServiceClear: TAction
      Category = 'LessonsActions'
      Caption = #1054#1095#1080#1089#1090#1080#1090#1100
      Hint = #1054#1095#1080#1089#1090#1080#1090#1100' '#1079#1085#1072#1095#1077#1085#1080#1077' '#1092#1080#1083#1100#1090#1088#1072' '#1087#1086' '#1091#1089#1083#1091#1075#1072#1084
      ImageIndex = 67
      OnExecute = actServiceClearExecute
    end
    object actToPayAll: TAction
      Category = 'LessonsActions'
      Caption = #1054#1087#1083#1072#1090#1080#1090#1100' '#1074#1089#1077
      Hint = #1055#1088#1086#1089#1090#1072#1074#1080#1090#1100' '#1076#1083#1103' '#1074#1089#1077#1093' '#1079#1072#1087#1080#1089#1077#1081' '#1087#1088#1080#1079#1085#1072#1082' "'#1086#1087#1083#1072#1090#1080#1090#1100'"'
      OnExecute = actToPayAllExecute
      OnUpdate = actToPayAllUpdate
    end
    object actTpPayWithoutConflict: TAction
      Category = 'LessonsActions'
      Caption = #1054#1087#1083#1072#1090#1080#1090#1100' '#1074#1089#1077' '#1073#1077#1089#1082#1086#1085#1092#1083#1080#1082#1090#1085#1099#1077
      Hint = #1055#1088#1086#1089#1090#1072#1074#1080#1090#1100' '#1076#1083#1103' '#1074#1089#1077#1093' '#1073#1077#1089#1082#1086#1085#1092#1083#1080#1082#1090#1085#1099#1093' '#1079#1072#1087#1080#1089#1077#1081' '#1087#1088#1080#1079#1085#1072#1082' "'#1086#1087#1083#1072#1090#1080#1090#1100'"'
      OnExecute = actTpPayWithoutConflictExecute
      OnUpdate = actTpPayWithoutConflictUpdate
    end
    object actToPayClear: TAction
      Category = 'LessonsActions'
      Caption = #1057#1085#1103#1090#1100' '#1087#1088#1080#1079#1085#1072#1082' "'#1086#1087#1083#1072#1090#1080#1090#1100'"'
      Hint = #1057#1085#1103#1090#1100' '#1076#1083#1103' '#1074#1089#1077#1093' '#1079#1072#1087#1080#1089#1077#1081' '#1087#1088#1080#1079#1085#1072#1082' "'#1086#1087#1083#1072#1090#1080#1090#1100'"'
      OnExecute = actToPayClearExecute
      OnUpdate = actToPayClearUpdate
    end
    object actToPaySubItem: TAction
      Category = 'LessonsActions'
      Caption = #1054#1087#1083#1072#1090#1080#1090#1100
      Hint = #1054#1087#1083#1072#1090#1080#1090#1100
      Visible = False
      OnExecute = actToPaySubItemExecute
      OnUpdate = actToPaySubItemUpdate
    end
    object actLessonSave: TAction
      Category = 'LessonsActions'
      Caption = #1057#1086#1093#1088#1072#1085#1080#1090#1100
      Hint = #1057#1086#1093#1088#1072#1085#1080#1090#1100' '#1080#1079#1084#1077#1085#1077#1085#1080#1103
      ImageIndex = 2
      OnExecute = actLessonSaveExecute
      OnUpdate = actLessonSaveUpdate
    end
    object actLessonCancel: TAction
      Category = 'LessonsActions'
      Caption = #1054#1090#1084#1077#1085#1080#1090#1100' '#1080#1079#1084#1077#1085#1077#1085#1080#1103
      Hint = #1054#1090#1084#1077#1085#1080#1090#1100' '#1074#1089#1077' '#1080#1079#1084#1077#1085#1077#1085#1080#1103', '#1087#1088#1086#1080#1079#1074#1077#1076#1105#1085#1085#1099#1077' '#1074' '#1090#1077#1082#1091#1097#1077#1084' '#1089#1077#1072#1085#1089#1077' '#1088#1072#1073#1086#1090#1099
      ImageIndex = 10
      OnExecute = actLessonCancelExecute
      OnUpdate = actLessonCancelUpdate
    end
    object actLessonConflictsShow: TAction
      Category = 'LessonsFilters'
      Caption = #1055#1086#1082#1072#1079#1072#1090#1100' '#1089#1074#1103#1079#1072#1085#1085#1099#1077' '#1082#1086#1085#1092#1083#1080#1082#1090#1085#1099#1077' '#1090#1072#1073#1077#1083#1080
      Hint = #1055#1086#1082#1072#1079#1072#1090#1100' '#1089#1074#1103#1079#1072#1085#1085#1099#1077' '#1082#1086#1085#1092#1083#1080#1082#1090#1085#1099#1077' '#1090#1072#1073#1077#1083#1080
      OnExecute = actLessonConflictsShowExecute
      OnUpdate = actLessonConflictsShowUpdate
    end
    object actTeacherDateInterval: TAction
      Category = 'TeachersFilters'
      Caption = #1055#1077#1088#1080#1086#1076' '#1087#1088#1086#1074#1077#1076#1077#1085#1080#1103' '#1079#1072#1085#1103#1090#1080#1081
      Hint = #1055#1077#1088#1080#1086#1076', '#1079#1072' '#1082#1086#1090#1086#1088#1099#1081' '#1073#1099#1083#1080' '#1087#1088#1086#1074#1077#1076#1077#1085#1099' '#1079#1072#1085#1103#1090#1080#1103
      OnExecute = actTeacherDateIntervalExecute
    end
    object actTeacherPayment: TAction
      Category = 'TeachersFilters'
      Caption = #1054#1087#1083#1072#1095#1077#1085#1086':'
      Hint = #1054#1087#1083#1072#1095#1077#1085#1086
      OnExecute = actTeacherPaymentExecute
    end
    object actTeachersExcelExport: TAction
      Category = 'TeachersActions'
      Caption = #1042' Excel'
      Hint = #1069#1082#1089#1087#1086#1088#1090' '#1074' MS Excel'
      ImageIndex = 48
      OnExecute = actTeachersExcelExportExecute
    end
    object actTeachersUpdate: TAction
      Category = 'TeachersActions'
      Caption = #1054#1073#1085#1086#1074#1080#1090#1100
      Hint = #1054#1073#1085#1086#1074#1080#1090#1100' '#1089#1087#1080#1089#1086#1082' '#1091#1095#1080#1090#1077#1083#1077#1081
      ImageIndex = 63
      OnExecute = actTeachersUpdateExecute
    end
    object actTeachersSave: TAction
      Category = 'TeachersActions'
      Caption = #1057#1086#1093#1088#1072#1085#1080#1090#1100
      Hint = #1057#1086#1093#1088#1072#1085#1080#1090#1100' '#1080#1079#1084#1077#1085#1077#1085#1080#1103
      ImageIndex = 2
      OnExecute = actTeachersSaveExecute
      OnUpdate = actTeachersSaveUpdate
    end
    object actTeacherPaymentDateInterval: TAction
      Category = 'TeachersFilters'
      Caption = #1055#1077#1088#1080#1086#1076' '#1086#1087#1083#1072#1090#1099
      Hint = #1055#1077#1088#1080#1086#1076', '#1079#1072' '#1082#1086#1090#1086#1088#1099#1081' '#1073#1099#1083#1080' '#1087#1088#1086#1074#1077#1076#1077#1085#1099' '#1086#1087#1083#1072#1090#1099
      OnExecute = actTeacherPaymentDateIntervalExecute
    end
  end
  object cxGridViewRepository1: TcxGridViewRepository
    Left = 816
    Top = 8
    object tvChildrenList: TcxGridDBTableView
      NavigatorButtons.ConfirmDelete = False
      DataController.DataSource = dsChildrenList
      DataController.KeyFieldNames = 'PID'
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      OptionsBehavior.CellHints = True
      OptionsBehavior.IncSearch = True
      OptionsData.Deleting = False
      OptionsData.Editing = False
      OptionsData.Inserting = False
      OptionsView.ColumnAutoWidth = True
      OptionsView.GroupByBox = False
      OptionsView.Header = False
      object tvChildrenList_PID: TcxGridDBColumn
        DataBinding.FieldName = 'PID'
        Visible = False
        VisibleForCustomization = False
      end
      object tvChildrenList_FIO: TcxGridDBColumn
        DataBinding.FieldName = 'FIO'
        SortIndex = 0
        SortOrder = soAscending
      end
    end
    object tvTeachersList: TcxGridDBTableView
      NavigatorButtons.ConfirmDelete = False
      DataController.DataSource = dsTeachersList
      DataController.KeyFieldNames = 'ID_USER'
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      OptionsBehavior.CellHints = True
      OptionsBehavior.IncSearch = True
      OptionsData.Deleting = False
      OptionsData.Editing = False
      OptionsData.Inserting = False
      OptionsView.ColumnAutoWidth = True
      OptionsView.GroupByBox = False
      OptionsView.Header = False
      object tvTeachersList_ID_USER: TcxGridDBColumn
        DataBinding.FieldName = 'ID_USER'
        Visible = False
        VisibleForCustomization = False
      end
      object tvTeachersList_FIO: TcxGridDBColumn
        DataBinding.FieldName = 'FIO'
        SortIndex = 0
        SortOrder = soAscending
      end
    end
    object tvServices: TcxGridDBTableView
      NavigatorButtons.ConfirmDelete = False
      DataController.DataSource = dsServices
      DataController.KeyFieldNames = 'SDID'
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      OptionsBehavior.CellHints = True
      OptionsBehavior.IncSearch = True
      OptionsData.Deleting = False
      OptionsData.Editing = False
      OptionsData.Inserting = False
      OptionsView.ColumnAutoWidth = True
      OptionsView.GroupByBox = False
      OptionsView.Header = False
      object tvServices_SDID: TcxGridDBColumn
        DataBinding.FieldName = 'SDID'
        Visible = False
        VisibleForCustomization = False
      end
      object tvServices_SDNAME: TcxGridDBColumn
        DataBinding.FieldName = 'SDNAME'
        SortIndex = 0
        SortOrder = soAscending
      end
    end
    object tvTimeSheetsWithConflict: TcxGridDBTableView
      NavigatorButtons.ConfirmDelete = False
      OnEditing = tvTimeSheetsWithConflictEditing
      DataController.DataSource = dsTimeSheetsWithConflict
      DataController.DetailKeyFieldNames = 'OUT_RSID;OUT_PID'
      DataController.KeyFieldNames = 'RSID;PID;OUT_RSID;OUT_PID'
      DataController.MasterKeyFieldNames = 'RSID;PID'
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <
        item
          Format = #1050#1086#1083'-'#1074#1086':,0'
          Kind = skCount
          Column = tvTimeSheetsWithConflict_CHILD_FIO
        end
        item
          Format = '#,###0'
          Kind = skSum
          Column = tvTimeSheetsWithConflict_RSOPLATIT
        end
        item
          Format = '#,###0'
          Kind = skSum
          Column = tvTimeSheetsWithConflict_RSOPLACHENO
        end>
      DataController.Summary.SummaryGroups = <>
      OptionsBehavior.CellHints = True
      OptionsBehavior.IncSearch = True
      OptionsCustomize.ColumnsQuickCustomization = True
      OptionsData.Deleting = False
      OptionsData.Inserting = False
      OptionsSelection.HideFocusRectOnExit = False
      OptionsView.ColumnAutoWidth = True
      OptionsView.ExpandButtonsForEmptyDetails = False
      OptionsView.Footer = True
      OptionsView.GroupByBox = False
      Styles.OnGetContentStyle = tvLessonStylesGetContentStyle
      object tvTimeSheetsWithConflict_RSID: TcxGridDBColumn
        DataBinding.FieldName = 'RSID'
        Visible = False
        Options.Editing = False
        Options.Filtering = False
        VisibleForCustomization = False
      end
      object tvTimeSheetsWithConflict_PID_PEDAG: TcxGridDBColumn
        DataBinding.FieldName = 'PID_PEDAG'
        Visible = False
        Options.Editing = False
        Options.Filtering = False
        VisibleForCustomization = False
      end
      object tvTimeSheetsWithConflict_TEACHER_FIO: TcxGridDBColumn
        Caption = #1060#1048#1054' '#1087#1088#1077#1087#1086#1076#1072#1074#1072#1090#1077#1083#1103
        DataBinding.FieldName = 'TEACHER_FIO'
        Options.Editing = False
        Options.Filtering = False
        SortIndex = 0
        SortOrder = soAscending
        Width = 62
      end
      object tvTimeSheetsWithConflict_CHILD_FIO: TcxGridDBColumn
        Caption = #1055#1086#1083#1091#1095#1072#1090#1077#1083#1100' '#1091#1089#1083#1091#1075
        DataBinding.FieldName = 'CHILD_FIO'
        Options.Editing = False
        Options.Filtering = False
        SortIndex = 1
        SortOrder = soAscending
        Width = 67
      end
      object tvTimeSheetsWithConflict_SERVICE_NAME: TcxGridDBColumn
        Caption = #1059#1089#1083#1091#1075#1072
        DataBinding.FieldName = 'SERVICE_NAME'
        Options.Editing = False
        Options.Filtering = False
        SortIndex = 2
        SortOrder = soAscending
        Width = 63
      end
      object tvTimeSheetsWithConflict_RSDATE: TcxGridDBColumn
        Caption = #1044#1072#1090#1072' '#1087#1088#1086#1074#1077#1076#1077#1085#1080#1103
        DataBinding.FieldName = 'RSDATE'
        Options.Editing = False
        Options.Filtering = False
        Width = 38
      end
      object tvTimeSheetsWithConflict_RSTIMEBEGIN: TcxGridDBColumn
        Caption = #1042#1088#1077#1084#1103' '#1085#1072#1095#1072#1083#1072
        DataBinding.FieldName = 'RSTIMEBEGIN'
        Options.Editing = False
        Options.Filtering = False
        Width = 30
      end
      object tvTimeSheetsWithConflict_RSTIMEEND: TcxGridDBColumn
        Caption = #1042#1088#1077#1084#1103' '#1086#1082#1086#1085#1095#1072#1085#1080#1103
        DataBinding.FieldName = 'RSTIMEEND'
        Options.Editing = False
        Options.Filtering = False
        Width = 30
      end
      object tvTimeSheetsWithConflict_SDID: TcxGridDBColumn
        DataBinding.FieldName = 'SDID'
        Visible = False
        Options.Editing = False
        Options.Filtering = False
        VisibleForCustomization = False
      end
      object tvTimeSheetsWithConflict_PID: TcxGridDBColumn
        DataBinding.FieldName = 'PID'
        Visible = False
        Options.Editing = False
        Options.Filtering = False
        VisibleForCustomization = False
      end
      object tvTimeSheetsWithConflict_RSOPLATIT: TcxGridDBColumn
        Caption = #1054#1087#1083#1072#1090#1080#1090#1100'?'
        DataBinding.FieldName = 'RSOPLATIT'
        RepositoryItem = DMInv.eriCheckBox
        Options.Filtering = False
        Styles.OnGetContentStyle = tvTimeSheetsWithConflict_RSOPLATITStylesGetContentStyle
        Width = 22
      end
      object tvTimeSheetsWithConflict_RSOPLACHENO: TcxGridDBColumn
        Caption = #1054#1087#1083#1072#1095#1077#1085#1086
        DataBinding.FieldName = 'RSOPLACHENO'
        RepositoryItem = DMInv.eriCheckBox
        Options.Editing = False
        Options.Filtering = False
        Width = 20
      end
      object tvTimeSheetsWithConflict_IS_TIME_CONFLICT_LATE: TcxGridDBColumn
        DataBinding.FieldName = 'IS_TIME_CONFLICT_LATE'
        Visible = False
        Options.Editing = False
        Options.Filtering = False
        VisibleForCustomization = False
      end
      object tvTimeSheetsWithConflict_IS_TIME_CONFLICT: TcxGridDBColumn
        DataBinding.FieldName = 'IS_TIME_CONFLICT'
        Visible = False
        Options.Editing = False
        Options.Filtering = False
        VisibleForCustomization = False
      end
      object tvTimeSheetsWithConflict_OUT_RSID: TcxGridDBColumn
        DataBinding.FieldName = 'OUT_RSID'
        Visible = False
        Options.Editing = False
        Options.Filtering = False
        VisibleForCustomization = False
      end
      object tvTimeSheetsWithConflict_OUT_PID: TcxGridDBColumn
        DataBinding.FieldName = 'OUT_PID'
        Visible = False
        Options.Editing = False
        Options.Filtering = False
        VisibleForCustomization = False
      end
      object tvTimeSheetsWithConflict_PAYMENT_DATE: TcxGridDBColumn
        Caption = #1044#1072#1090#1072' '#1086#1087#1083#1072#1090#1099
        DataBinding.FieldName = 'PAYMENT_DATE'
        Options.Editing = False
        Options.Filtering = False
        Width = 35
      end
      object tvTimeSheetsWithConflict_CONFLICT_TEXT: TcxGridDBColumn
        Caption = #1055#1088#1080#1095#1080#1085#1072' '#1082#1086#1085#1092#1083#1080#1082#1090#1072
        DataBinding.FieldName = 'CONFLICT_TEXT'
        RepositoryItem = DMInv.eriMemo
        Options.Editing = False
        Options.Filtering = False
        Width = 52
      end
      object tvTimeSheetsWithConflict_CONFLICT_NOTE: TcxGridDBColumn
        Caption = #1050#1086#1084#1084#1077#1085#1090#1072#1088#1080#1081' '#1082' '#1082#1086#1085#1092#1083#1080#1082#1090#1091
        DataBinding.FieldName = 'CONFLICT_NOTE'
        RepositoryItem = DMInv.eriMemo
        Options.Editing = False
        Options.Filtering = False
        Width = 52
      end
      object tvTimeSheetsWithConflict_CONFLICT_LATE_TEXT: TcxGridDBColumn
        Caption = #1057#1074#1103#1079#1072#1085#1085#1099#1081' '#1082#1086#1085#1092#1083#1080#1082#1090
        DataBinding.FieldName = 'CONFLICT_LATE_TEXT'
        RepositoryItem = DMInv.eriMemo
        Options.Editing = False
        Options.Filtering = False
        Width = 53
      end
      object tvTimeSheetsWithConflict_CHIEF_NOTE: TcxGridDBColumn
        Caption = #1050#1086#1084#1084#1077#1085#1090#1072#1088#1080#1081' '#1088#1091#1082#1086#1074#1086#1076#1080#1090#1077#1083#1103
        DataBinding.FieldName = 'CHIEF_NOTE'
        RepositoryItem = DMInv.eriBlobEdit
        OnGetCellHint = tvLesson_CHIEF_NOTEGetCellHint
        Options.Filtering = False
        Styles.OnGetContentStyle = tvTimeSheetsWithConflict_CHIEF_NOTEStylesGetContentStyle
        Width = 52
      end
      object tvTimeSheetsWithConflict_TTARIF: TcxGridDBColumn
        Caption = #1058#1072#1088#1080#1092
        DataBinding.FieldName = 'TTARIF'
        Options.Editing = False
        Options.Filtering = False
        Width = 49
      end
      object tvTimeSheetsWithConflict_EDIT_TARIFF: TcxGridDBColumn
        Caption = #1048#1079#1084#1077#1085#1105#1085#1085#1099#1081' '#1090#1072#1088#1080#1092
        DataBinding.FieldName = 'EDIT_TARIFF'
        RepositoryItem = DMInv.eriCalcEdit
        Options.Filtering = False
        Styles.OnGetContentStyle = tvTimeSheetsWithConflict_EDIT_TARIFFStylesGetContentStyle
        Width = 47
      end
      object tvTimeSheetsWithConflict_RSOPLATIT_EDITED: TcxGridDBColumn
        DataBinding.FieldName = 'RSOPLATIT_EDITED'
        Visible = False
        Options.Filtering = False
        VisibleForCustomization = False
      end
      object tvTimeSheetsWithConflict_CHIEF_NOTE_EDITED: TcxGridDBColumn
        DataBinding.FieldName = 'CHIEF_NOTE_EDITED'
        Visible = False
        Options.Filtering = False
        VisibleForCustomization = False
      end
      object tvTimeSheetsWithConflict_EDIT_TARIFF_EDITED: TcxGridDBColumn
        DataBinding.FieldName = 'EDIT_TARIFF_EDITED'
        Visible = False
        Options.Filtering = False
        VisibleForCustomization = False
      end
    end
  end
  object fdsLesson: TpFIBDataSet
    SelectSQL.Strings = (
      'select distinct SC.SCID,'
      '                RS.PID_PEDAG,'
      
        '                (T.PLASTNAME || '#39' '#39' || substring(T.PNAME from 1 ' +
        'for 1) || '#39'. '#39' || coalesce(substring(T.PPATRONYMIC from 1 for 1)' +
        ' || '#39'.'#39', '#39#39')) as TEACHER_FIO,'
      '                RS.SDID,'
      '                SD.SDNAME,'
      '                RS.RSDATE,'
      
        '                (P.PLASTNAME || '#39' '#39' || substring(P.PNAME from 1 ' +
        'for 1) || '#39'. '#39' || coalesce(substring(P.PPATRONYMIC from 1 for 1)' +
        ' || '#39'.'#39', '#39#39')) as PP,'
      '                RSP.RSOPLATIT,'
      '                RSP.RSOPLACHENO,'
      '                RSP.PID,'
      '                RSP.RSID,'
      '                ('#39#1058#1077#1084#1072': '#39'||RS.RSTEMA) as RSTEMA,'
      '                ('#39#1053#1072#1073#1083#1102#1076#1077#1085#1080#1077': '#39'||RSP.RSPNOTE) as RSNABLJUD,'
      '                RSP.RSPTIMEENTER,'
      '                RS.RSTIMEBEGIN,'
      '                RS.RSTIMEEND,'
      '                SD1.SDNAME AS OSN_PODR,'
      '                RSP.IS_TIME_CONFLICT,'
      
        '                iif((RSP.IS_TIME_CONFLICT > 0), 1, 0) as IS_EXIS' +
        'T_TIME_CONFLICT,'
      
        '                ('#39#1054#1073#1098#1103#1089#1085#1077#1085#1080#1077' '#1087#1077#1076#1072#1075#1086#1075#1072': '#39' || RSP.CONFLICT_NOTE) a' +
        's CONFLICT_NOTE,'
      
        '                ('#39#1055#1088#1080#1095#1080#1085#1072' '#1082#1086#1085#1092#1083#1080#1082#1090#1072': '#39' || TC.CONFLICT_TEXT) as C' +
        'ONFLICT_TEXT,'
      '                RSP.CHIEF_NOTE,'
      '                DUT.TTARIF,'
      '                RS.RSUSERENTER,'
      '                RSP.PAYMENT_DATE,'
      '                RSP.EDIT_TARIFF,'
      '                RSP.IS_TIME_CONFLICT_LATE,'
      
        '                iif((RSP.IS_TIME_CONFLICT_LATE > 0), 1, 0) as IS' +
        '_EXIST_TIME_CONFLICT_LATE,'
      
        '                ('#39#1055#1088#1080#1095#1080#1085#1072' '#1089#1074#1103#1079#1072#1085#1085#1086#1075#1086' '#1082#1086#1085#1092#1083#1080#1082#1090#1072': '#39' || TCL.CONFLIC' +
        'T_TEXT) as CONFLICT_LATE_TEXT,'
      '                0 as RSOPLATIT_EDITED,'
      '                0 as CHIEF_NOTE_EDITED,'
      '                0 as EDIT_TARIFF_EDITED,'
      
        '                iif(((RSP.RSOPLATIT = 0) and (coalesce(RSP.IS_TI' +
        'ME_CONFLICT, 0) = 0) and (coalesce(RSP.IS_TIME_CONFLICT_LATE, 0)' +
        ' = 0)), 1, 0) as IS_NOT_TO_PAY_WITHOUT_CONFLICT,'
      
        '                iif(((RSP.RSOPLATIT = 1) and (RSP.RSOPLACHENO = ' +
        '0)), 1, 0) as IS_WITH_TO_PAY_WITHOUT_PAYMENT,'
      '                0 as ARECORD_VERSION'
      'from RENDERING_SERVICES RS'
      'inner join SYS_DIC SD on (SD.SDID = RS.SDID)'
      'inner join RS_PEOPLE RSP on (RSP.RSID = RS.RSID)'
      'inner join PEOPLE P on (P.PID = RSP.PID)'
      'inner join PEOPLE T on (T.PID = RS.PID_PEDAG)'
      'inner join AGR_POLUCH_USLUG APU on (APU.PID = RSP.PID)'
      'inner join AGREEMENTS A on (A.AGID = APU.AGID)'
      
        'inner join SPEC_COND SC on ((SC.AGID = APU.AGID) and (SC.SCID = ' +
        'RSP.ID_SPEC_COND))'
      'inner join SERVICES S on (S.SCID = SC.SCID)'
      
        'inner join SERVICES_TYPE ST on ((ST.STID = S.STID) and (ST.STSDI' +
        'DTABEL = RS.SDID))'
      
        'left join DETI_PODRAZD_SC DP on ((DP.SCID = SC.SCID) and (RS.RSD' +
        'ATE between cast(DP.DPDATEIN as date) and coalesce(cast(DP.DPDAT' +
        'EOUT as date), current_date)))'
      'left join SYS_DIC SD1 on (SD1.SDID = DP.SDID)'
      
        'left join P_GET_TEXT_CONFLICT(RSP.IS_TIME_CONFLICT) TC on (1 = 1' +
        ')'
      
        'left join P_GET_TEXT_CONFLICT(RSP.IS_TIME_CONFLICT_LATE) TCL on ' +
        '(1 = 1)'
      
        'left join DOP_USL_TARIFFS DUT on ((DUT.SDID = SD.SDID) and (DUT.' +
        'PID = RS.PID_PEDAG) and (RS.RSDATE between DUT.TDATEBEGIN and co' +
        'alesce(DUT.TDATEEND, RS.RSDATE)))'
      'where ((coalesce(RS.RSISDELETE, 0) = 0) and'
      '       (coalesce(RSP.RSPISDELETE, 0) = 0) and'
      '       (RS.RSDATE between :DATE_BEGIN and :DATE_END) and'
      
        '       --((DUT.TDATEBEGIN is null) or (RS.RSDATE between DUT.TDA' +
        'TEBEGIN and coalesce(DUT.TDATEEND, RS.RSDATE))) and'
      
        '       ((cast(:ID_CHILDREN as D_INT) is null) or (P.PID = :ID_CH' +
        'ILDREN)) and'
      
        '       ((cast(:ID_TEACHER as d_int) is null) or (RS.PID_PEDAG = ' +
        ':ID_TEACHER)) and'
      
        '       ((cast(:ID_SERVICE as D_INT) is null) or (RS.SDID = :ID_S' +
        'ERVICE)) and'
      '       ((:IS_ALL_TO_PAY is not distinct from 1) or'
      
        '        (:IS_TO_PAY is not distinct from 1) and (RSP.RSOPLATIT =' +
        ' 1) or'
      
        '        (:IS_TO_PAY is distinct from 1) and (RSP.RSOPLATIT is di' +
        'stinct from 1)) and'
      
        '       ((:IS_ALL_CONFLICT is not distinct from 1) and ((:IS_TIME' +
        '_CONFLICT_LATE is distinct from 1) or (coalesce(RSP.IS_TIME_CONF' +
        'LICT, 0) > 0) or (coalesce(RSP.IS_TIME_CONFLICT_LATE, 0) = 0)) o' +
        'r'
      '        (:IS_WITH_CONFLICT is not distinct from 1) and'
      
        '        ((coalesce(RSP.IS_TIME_CONFLICT, 0) > 0) or (:IS_TIME_CO' +
        'NFLICT_LATE is distinct from 1) and (coalesce(RSP.IS_TIME_CONFLI' +
        'CT_LATE, 0) > 0)) or'
      
        '        (:IS_WITH_CONFLICT is distinct from 1) and (coalesce(RSP' +
        '.IS_TIME_CONFLICT, 0) = 0) and'
      '        (coalesce(RSP.IS_TIME_CONFLICT_LATE, 0) = 0)) and'
      '       ((:IS_ALL_PAYMENT is not distinct from 1) or'
      
        '        (:IS_PAYMENT is not distinct from 1) and (RSP.RSOPLACHEN' +
        'O is not distinct from 1) or'
      
        '        (:IS_PAYMENT is distinct from 1) and (RSP.RSOPLACHENO is' +
        ' distinct from 1)) and'
      '       not exists(select T1.*'
      '                  from (with recursive TREE as'
      
        '                             (select SD.SDNAME, SD.SDID, SD.SDPA' +
        'RID'
      '                              from SYS_DIC SD'
      '                              where SD.SDPARID = 11746'
      '                              union all'
      
        '                              select SD1.SDNAME, SD1.SDID, SD1.S' +
        'DPARID'
      '                              from SYS_DIC SD1'
      
        '                              inner join TREE T on T.SDID = SD1.' +
        'SDPARID)'
      '                        select SDNAME,'
      '                               SDID,'
      '                               SDPARID'
      '                       from TREE T) as T1'
      '                  where (T1.SDID = SD.SDID)) and'
      '       (coalesce(SC.SCISDELETE, 0) = 0) and'
      '       (coalesce(S.SISDELETE, 0) = 0) and'
      '       (coalesce(ST.STISDELETE, 0) = 0) and'
      
        '       --(SC.SCDATEBEGIN <= :DATE_END) and (SC.SCDATEEND >= :DAT' +
        'E_BEGIN) and'
      
        '       --(A.AGDATEBEGIN <= :DATE_END) and (A.AGDATEEND >= :DATE_' +
        'BEGIN) and'
      '       (coalesce(A.AGISDELETE, 0) = 0)'
      '      )')
    Transaction = DMInv.trFibRead
    Database = DMInv.db
    Left = 436
    Top = 113
    oNoForceIsNull = True
  end
  object fdsChildrenList: TpFIBDataSet
    SelectSQL.Strings = (
      
        'select distinct P.PID, coalesce(P.PLASTNAME, '#39#39') || '#39' '#39' || coale' +
        'sce(P.PNAME, '#39#39') || '#39' '#39' || coalesce(P.PPATRONYMIC, '#39#39') as FIO'
      'from PEOPLE P'
      'inner join AGR_POLUCH_USLUG AGP on (AGP.PID = P.PID)'
      'inner join SPEC_COND SC on (SC.AGID = AGP.AGID)'
      'inner join DETI_PODRAZD_SC DP on (DP.SCID = SC.SCID)'
      'inner join RS_PEOPLE RSP on (RSP.PID = P.PID)'
      'where ((coalesce(P.PISDELETE, 0) = 0) and'
      '       (coalesce(SC.SCISDELETE, 0) = 0) and'
      '       (DP.DPTYPE = 1) and'
      '       --(current_date between DP.DPDATEIN and DP.DPDATEOUT) and'
      '       (coalesce(RSP.RSPISDELETE, 0) = 0))')
    Transaction = DMInv.trFibRead
    Database = DMInv.db
    Left = 436
    Top = 170
    oNoForceIsNull = True
  end
  object dsChildrenList: TDataSource
    DataSet = fdsChildrenList
    Left = 375
    Top = 170
  end
  object fdsTeachersList: TpFIBDataSet
    SelectSQL.Strings = (
      'with recursive'
      'TREE as ('
      '         select SD.SDNAME, SD.SDID, SD.SDPARID, SD.SDISDELETE'
      '         from SYS_DIC SD'
      
        '         where SD.SDPARID in (13204, 13209, 13898, 13212, 13907,' +
        ' 13203, 13208, 13211)'
      '         union all'
      
        '         select SD1.SDNAME, SD1.SDID, SD1.SDPARID, SD1.SDISDELET' +
        'E'
      '         from SYS_DIC SD1'
      '         inner join TREE T on (T.SDID = SD1.SDPARID)'
      '        )'
      
        'select P.PID as ID_USER, P.PLASTNAME || '#39' '#39' || P.PNAME || '#39' '#39' ||' +
        ' P.PPATRONYMIC as FIO'
      'from DOLJNOST_PEOPLE DP'
      'inner join PEOPLE P on (P.PID = DP.PID)'
      'inner join DOLJNOST D on (D.DOLID = DP.DOLID)'
      'inner join TREE T on (T.SDID = D.SDID)'
      
        'where (current_date between DP.DOLDATEBEGIN and coalesce(DP.DOLD' +
        'ATEEND, current_date))'
      'union'
      
        'select P.PID as ID_USER, P.PLASTNAME || '#39' '#39' || P.PNAME || '#39' '#39' ||' +
        ' P.PPATRONYMIC as FIO'
      'from PEOPLE P'
      'inner join DOLJNOST_PEOPLE DP on (DP.PID = P.PID)'
      'where (DP.DOLID = 310)')
    Transaction = DMInv.trFibRead
    Database = DMInv.db
    Left = 436
    Top = 225
    oNoForceIsNull = True
  end
  object dsTeachersList: TDataSource
    DataSet = fdsTeachersList
    Left = 375
    Top = 225
  end
  object fdsServices: TpFIBDataSet
    SelectSQL.Strings = (
      'WITH   recursive'
      '   TREE'
      
        '   AS (SELECT SD.SDNAME, SD.SDID, sd.SDPARID, sd.SDISDELETE FROM' +
        ' SYS_DIC SD'
      '      WHERE sd.SDPARID = 20'
      '      UNION ALL'
      '      SELECT SD1.SDNAME, SD1.SDID, sd1.SDPARID, sd1.SDISDELETE'
      '      FROM SYS_DIC SD1'
      '          INNER JOIN tree t '
      '           ON t.sdid = sd1.SDPARID)'
      'select T.SDID, T.SDNAME'
      'from SERVICES_TYPE ST'
      'inner join TREE T on (T.SDID = ST.STSDIDTABEL)'
      'where (ST.STISARCHIVE = 0)'
      'group by 1, 2')
    Transaction = DMInv.trFibRead
    Database = DMInv.db
    Left = 436
    Top = 283
    oNoForceIsNull = True
  end
  object dsServices: TDataSource
    DataSet = fdsServices
    Left = 375
    Top = 283
  end
  object qTimeSheetListUpdate: TpFIBQuery
    Transaction = DMInv.trFibWrite
    Database = DMInv.db
    SQL.Strings = (
      
        'execute procedure RS_PEOPLE$EDIT (:AOPERATION, :RSID, :PID, :RSP' +
        'LEVEL, :RSPNOTE, :RSOPLATIT, :RSOPLACHENO, :TID,'
      
        '    :RSPCORRECTION, :TARIF, :CHIEF_NOTE, :IS_TIME_CONFLICT, :CON' +
        'FLICT_NOTE, :ID_SPEC_COND, :ID_SHEET, :IS_EXTRA_SERVICE,'
      
        '    :PAYMENT_DATE, :EDIT_TARIFF, :IS_TIME_CONFLICT_LATE, :PID_PE' +
        'DAG, :RSDATE, :RSTIMEBEGIN, :RSTIMEEND)')
    Left = 509
    Top = 113
  end
  object fdsTimeSheetsWithConflict: TpFIBDataSet
    SelectSQL.Strings = (
      'select P.*, 0 as ARECORD_VERSION'
      
        'from P_GET_RS_PEOPLE_WITH_CONFLICT(:START_DATE, :END_DATE, :ID_C' +
        'HILDREN, :ID_TEACHER, :ID_SERVICE, :IS_ALL_TO_PAY, :IS_TO_PAY, :' +
        'IS_ALL_PAYMENT, :IS_PAYMENT) P')
    Transaction = DMInv.trFibRead
    Database = DMInv.db
    Left = 436
    Top = 345
  end
  object dsTimeSheetsWithConflict: TDataSource
    DataSet = cdsTimeSheetsWithConflict
    Left = 375
    Top = 345
  end
  object cdsTimeSheetsWithConflict: TClientDataSet
    Aggregates = <>
    Params = <>
    AfterPost = cdsTimeSheetsWithConflictAfterPost
    Left = 320
    Top = 345
  end
  object fdsTeachers: TpFIBDataSet
    SelectSQL.Strings = (
      'select distinct RS.PID_PEDAG,--'#1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1087#1088#1077#1087#1086#1076#1072#1074#1072#1090#1077#1083#1103
      '                SP.KOL_K_OPLATE KOPLATE,--'#1050' '#1086#1087#1083#1072#1090#1077' '#1096#1090
      '                SP.KOL_UJE_VYPL as OPLACHENO_,--'#1059#1078#1077' '#1086#1087#1083'. '#1096#1090'.'
      
        '                (P.PLASTNAME || '#39' '#39' || substring(P.PNAME from 1 ' +
        'for 1) || '#39'. '#39' || coalesce(substring(P.PPATRONYMIC from 1 for 1)' +
        ' || '#39'.'#39', '#39#39')) as PP,--'#1055#1088#1077#1087#1086#1076#1072#1074#1072#1090#1077#1083#1100
      '                0 as OPLACHENO,--'#1054#1087#1083#1072#1095#1077#1085#1086'?'
      '                SP.AMOUNT_VYPLATIT,--'#1050' '#1086#1087#1083#1072#1090#1077
      '                SP.AMOUNT_UJE_VYPLATILI,--'#1059#1078#1077' '#1074#1099#1087#1083#1072#1090#1080#1083#1080
      
        '                SP1.AMOUNT_VYPLATIT as VYPLATIT_PERIOD,--'#1050' '#1086#1087#1083'. ' +
        #1079#1072' '#1087#1077#1088#1080#1086#1076
      
        '                SP1.AMOUNT_UJE_VYPLATILI as UJE_VYPL_PERIOD,--'#1059#1078 +
        #1077' '#1086#1087#1083'. '#1079#1072#1085#1103#1090#1080#1103' '#1079#1072' '#1087#1077#1088#1080#1086#1076
      '                SP2.COUNT_PAYMENT,--'#1050#1086#1083'-'#1074#1086' '#1086#1087#1083#1072#1095#1077#1085#1085#1099#1093' '#1079#1072' '#1087#1077#1088#1080#1086#1076
      '                SP2.AMOUNT_PAYMENT--'#1054#1087#1083#1072#1095#1077#1085#1086' '#1079#1072' '#1087#1077#1088#1080#1086#1076
      'from RENDERING_SERVICES RS'
      'inner join PEOPLE P on (P.PID = RS.PID_PEDAG)'
      
        'inner join SP_DOP_USL(current_date - 3650, current_date) SP on (' +
        'SP.PID = P.PID)'
      
        'inner join SP_DOP_USL(:START_DATE, :END_DATE) as SP1 on (SP1.PID' +
        ' = P.PID)'
      
        'inner join SP_DOP_USL(:START_DATE_PAYMENT, :END_DATE_PAYMENT) as' +
        ' SP2 on (SP2.PID = P.PID)'
      'where ((coalesce(RS.RSISDELETE, 0) = 0) and'
      '       (P.PISDELETE is null) and'
      
        '       ((:IS_ALL is not distinct from 1) or (SP.AMOUNT_VYPLATIT ' +
        '> 0)))')
    Transaction = DMInv.trFibRead
    Database = DMInv.db
    Left = 107
    Top = 87
  end
  object qTeachersUpdate: TpFIBQuery
    Transaction = DMInv.trFibWrite
    Database = DMInv.db
    SQL.Strings = (
      'select P.OUT_ERROR, P.OUT_AMOUNT'
      'from P_RS_PEOPLE_PAYMENT(:ID_TEACHER, :ID_SHEET) P')
    Left = 170
    Top = 87
  end
  object cdsTeachers: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 20
    Top = 87
  end
  object qSheetsInsert: TpFIBQuery
    Transaction = DMInv.trFibWrite
    Database = DMInv.db
    SQL.Strings = (
      'select SH.OUT_ID, SH.OUT_ERROR'
      
        'from SHEETS$EDIT(:AOPERATION, :ID, :POST_DATE, :BEGIN_DATE, :END' +
        '_DATE, :IS_POST) SH')
    Left = 247
    Top = 87
  end
  object fdsDutyTimeSheets: TpFIBDataSet
    SelectSQL.Strings = (
      
        'select extract(year from RS.RSDATE) as AYEAR, extract(month from' +
        ' RS.RSDATE) as AMONTH, count(RS.RSDATE) as ACOUNT'
      'from RENDERING_SERVICES RS'
      'inner join RS_PEOPLE RSP on (RSP.RSID = RS.RSID)'
      'inner join PEOPLE P on (P.PID = RS.PID_PEDAG)'
      'inner join PEOPLE PCH on (PCH.PID = RSP.PID)'
      
        'where ((RS.RSDATE < cast('#39'01.'#39' || cast(extract(month from curren' +
        't_date) as D_STR5) || '#39'.'#39' || cast(extract(year from current_date' +
        ') as d_str5) as D_DATE)) and'
      '       (coalesce(RSP.RSOPLATIT, 0) = 0) and'
      '       (coalesce(RSP.IS_TIME_CONFLICT, 0) = 0) and'
      '       (coalesce(RSP.IS_TIME_CONFLICT_LATE, 0) = 0) and'
      '       (coalesce(RS.RSISDELETE, 0) = 0) and'
      '       (coalesce(RSP.RSPISDELETE, 0) = 0) and'
      '       not exists(select T1.*'
      '                  from (with recursive TREE as'
      
        '                             (select SD.SDNAME, SD.SDID, SD.SDPA' +
        'RID'
      '                              from SYS_DIC SD'
      '                              where SD.SDPARID = 11746'
      '                              union all'
      
        '                              select SD1.SDNAME, SD1.SDID, SD1.S' +
        'DPARID'
      '                              from SYS_DIC SD1'
      
        '                              inner join TREE T on T.SDID = SD1.' +
        'SDPARID)'
      '                        select SDNAME,'
      '                               SDID,'
      '                               SDPARID'
      '                       from TREE T) as T1'
      '                  where (T1.SDID = RS.SDID)))'
      'group by 1, 2')
    Transaction = DMInv.trFibRead
    Database = DMInv.db
    Left = 436
    Top = 408
  end
  object aeControlLesson: TApplicationEvents
    OnException = aeControlLessonException
    Left = 912
    Top = 8
  end
  object fdsErrors: TpFIBDataSet
    SelectSQL.Strings = (
      'SELECT CAST(NULL AS D_INT) AS ID_TEACHER,'
      '       CAST(NULL AS D_STR255) AS TEACHER_NAME,'
      '       CAST(NULL AS D_INT) AS ID_CHILD,'
      '       CAST(NULL AS D_STR255) AS CHILD_NAME,'
      '       CAST(NULL AS D_INT) AS ID_SERVICE_TYPE,'
      '       CAST(NULL AS D_STR255) AS SERVICE_TYPE_NAME,'
      '       CAST(NULL AS D_DATE) AS CARRYING_OUT_DATE,'
      '       CAST(NULL AS D_TIME) AS START_TIME,'
      '       CAST(NULL AS D_TIME) AS END_TIME'
      'FROM rdb$database')
    Transaction = DMInv.trFibRead
    Database = DMInv.db
    Left = 435
    Top = 474
  end
  object dsErrors: TDataSource
    DataSet = cdsErrors
    Left = 375
    Top = 474
  end
  object cdsErrors: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 321
    Top = 474
  end
  object fdsTeacherErrors: TpFIBDataSet
    SelectSQL.Strings = (
      'SELECT CAST(NULL AS D_INT) AS ID_TEACHER,'
      '       CAST(NULL AS D_STR255) AS TEACHER_NAME,'
      '       CAST(NULL AS D_FLOAT) AS AMOUNT_TO_PAY,'
      '       CAST(NULL AS D_FLOAT) AS AMOUNT_PAYMENT'
      'FROM rdb$database')
    Transaction = DMInv.trFibRead
    Database = DMInv.db
    Left = 435
    Top = 542
  end
  object cdsTeacherErrors: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 321
    Top = 542
  end
  object dsTeacherErrors: TDataSource
    DataSet = cdsTeacherErrors
    Left = 375
    Top = 542
  end
end
